home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 04q.dir / 00001_sM.ls next >
Encoding:
Text File  |  1999-05-06  |  1.3 KB  |  55 lines
  1. on startMovie
  2.   global gqtcurrenttime, gqtcurrentmovie, gPcVidSprite
  3.   gPcVidSprite = 52
  4. end
  5.  
  6. on stopMovie
  7.   global gqtcurrenttime
  8.   gqtcurrenttime = 0
  9.   stopmovieqt()
  10. end
  11.  
  12. on idleOld
  13.   global gCursorReady
  14.   if gCursorReady = 1 then
  15.     cursor(200)
  16.     checkCursors()
  17.     set the locH of sprite 46 to the mouseH
  18.     set the locV of sprite 46 to the mouseV
  19.     updateStage()
  20.   end if
  21. end
  22.  
  23. on checkCursors
  24.   global gMagCursor
  25.   beep()
  26.   set the castNum of sprite 46 to the number of member "curs1"
  27.   if rollOver(4) then
  28.     set the castNum of sprite 46 to the number of member "hotCursor"
  29.   end if
  30.   repeat with i = 10 to 13
  31.     if rollOver(i) then
  32.       set the castNum of sprite 46 to the number of member "hotCursor"
  33.     end if
  34.   end repeat
  35.   if rollOver(16) then
  36.     set the castNum of sprite 46 to the number of member "hotCursor"
  37.   end if
  38.   if rollOver(18) then
  39.     set the castNum of sprite 46 to the number of member "hotCursor"
  40.   end if
  41.   if rollOver(20) then
  42.     set the castNum of sprite 46 to the number of member "hotCursor"
  43.   end if
  44.   if rollOver(24) then
  45.     set the castNum of sprite 46 to the number of member "hotCursor"
  46.   end if
  47.   if rollOver(40) then
  48.     set the castNum of sprite 46 to the number of member "nonCursor"
  49.   end if
  50.   if rollOver(41) then
  51.     set the castNum of sprite 46 to the number of member "nonCursor"
  52.     cursor(-1)
  53.   end if
  54. end
  55.